//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "TImportParameterForm.h"
#include "CoFunction.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TImportParameterForm *ImportParameterForm;
//---------------------------------------------------------------------------
__fastcall TImportParameterForm::TImportParameterForm(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TImportParameterForm::ShowSourceParameter(const AnsiString Text)
{
	SourceMemo->Lines->Add(Text);
//	SourceMemo->
}
//---------------------------------------------------------------------------
void __fastcall TImportParameterForm::ShowProgress(const AnsiString Text)
{
	MessageMemo->Lines->Add("");
	MessageMemo->Lines->Add(Text);
//	this->Color

//	Canvas->Pen->Color = Color;
//	Canvas->Rectangle(0, 120, ClientWidth, 140);
//	WriteAnsiStringCentreCanvas(Canvas, Text, ClientWidth, 120);
};
//---------------------------------------------------------------------------
void __fastcall TImportParameterForm::ShowParameter(const AnsiString Text)
{
	MessageMemo->Lines->Add(Text);
//	Canvas->Rectangle(0, 150, ClientWidth, 180);
//	WriteAnsiStringCentreCanvas(Canvas, Text, ClientWidth, 150);
}
//---------------------------------------------------------------------------
void __fastcall TImportParameterForm::Button1Click(TObject *Sender)
{
	Close();
}
//---------------------------------------------------------------------------
